home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Magnum One
/
Magnum One (Mid-American Digital) (Disc Manufacturing).iso
/
d14
/
command.arc
/
COMMAND.TBK
(
.txt
)
next >
Wrap
Asymetrix ToolBook File
|
1990-10-18
|
13KB
|
175 lines
System
keychar
toolbook
command
pagesize
6495,1800
Command II
--Copyright 1990, Asymetrix Corporation.
All rights reserved.
--Jeff Day,
5Technical Support
_.tbk"
toolbook
"OK"
linkDLL "tbkwin.dll"
yieldapp()
unlinkDLL "
command
leaveSystem
command
command.tbk
sysWindowHandle
command.tbk
command.tbk
tbkwin.dll
yieldapp
yieldapp
show mainwindow
command.tbk
tbkwin.dll
if visible of mainWindow is true;hide mainWindow;else;show mainWindow;end
command.tbk
toolbook
leaveSystem
command.tbk
send exit
command.tbk
tbkwin.dll
yieldapp
yieldapp
tbkwin.dll
toolbook
--Copyright 1990, Asymetrix Corporation.
All rights reserved.
--Jeff Day,
5Technical Support
Xuser
gsetwindowword(
showwindow(
thisBook
X"tbkwin.dll"
getWinIniVar(
gsetWinIniVar(
getwininivar("toolbook","
"Would you like
install ""Command II"", a BETTER
ToolBook?"
f"Install"
"Cancel"
setwinIniVar("
"An error occured
cattempting
II"".
Please restart Windows 3.0
installed.
qinstance
(found.
will be shut down."
setparent(
setwinstyle(
,54984)
" &&
" &&
\ hwnd,
parentHwnd
--This was a neat trick, but the behavior
unacceptable
activateInstance
B"ball"
B"bcopy"
B, isShift
B"bselection"
toggleStatus
enterbook
keyDown
keychar
toggleStatus
style
setwinstyle
setparent
enterbook
reader
setwindowword
showwindow
syswindowhandle
tbkwin.dll
getWinIniVar
setWinIniVar
command.tbk
toolbook
startupsysbooks
getwininivar
Would you like to install "Command II", a BETTER command window for ToolBook?
Install
Cancel
Install
toolbook
startupsysbooks
getwininivar
toolbook
startupsysbooks
setwinIniVar
An error occured while attempting to install "Command II". Please restart Windows 3.0 and try again.
"Command II" installed. Please start a new instance of ToolBook.
No ToolBook instance found. Please start a new instance of ToolBook. "Command II" will be shut down.
setparent
setwinstyle
sizeToPage
is not in sysbooks;push
onto sysbooks;end
thisBook
setwinstyle
setwindowword
style
setparent
setwindowword
parentHwnd
keychar
buttonDown
buttonDown
bcopy
keyDown
isShift
buttonDown
bselection
toggleStatus
selection
Execute Selection
Ctrl-S
beep 10fdgfdsfdf seconds
beep 10set sts to selectedTextState
Copy All to Clipboard
Ctrl-C
command
4currentSel
selectedTextState
leaveField
leaveField
currentSel
bcopy
4currentSel
temp
buttonDown
buttonDown
command
command
command
currentSel
Execute All
Ctrl-E
bselection
4currentSel
toolbook
buttonDown
buttonDown
command
toolbook
currentSel
toolbook
buttonDown
buttonDown
toolbook
command
B ,@